Amiga Plus 1996 #6/Amiga Plus CD - 1996 - No. 06.iso/pd/programmierung/stormamiga_lib/stormamiga.lib hd-install

Text File | 1996-08-18 | 8KB | 374 lines

;*********************************************************
;* stormamiga.lib Installer Version 1.00 17. August 1996 *
;*                                                       *
;*          © Kopierrecht 1996 bei COMPIUTECK            *
;*            geschrieben von Matthias Henze             *
;*                                                       *
;*********************************************************
;
; $VER: stormamiga.lib Version 41.035 Install Version 1.00 (17.8.96)

(set stormamiga-version "Version 41.035")
(set stormamiga-date "(17. August 96)")

;====================================================================
; Initialisierungen
;====================================================================

(set @default-dest "")

(set #welcome (cat
"\nWillkommen bei der Installation der \n\n"
"\"stormamiga.lib\"\n"
"" stormamiga-version " vom "stormamiga-date"\n\n"
"Dieses Skript installiert die \"stormamiga.lib\",\n"
"entsprechend Ihrer Angaben, auf Ihre Festplatte.\n\n\n"
"© Kopierrecht 1996 bei COMPIUTECK\n"
"geschrieben von Matthias Henze"))

(set #Sprachstandard_Auswahl (cat
"\nWählen Sie den Sprachstandard aus, für den Sie die \"stormamiga.lib\" installieren möchten.\n"))

(set #C         "ANSI C")
(set #C++       "C++")
(set #C_&_C++   "ANSI C und C++")


(set #startup_Auswahl (cat
"\nIn \"ANSI C\" ist es möglich den Startupcode \"stormamiga_startups.o\" zu verwenden. Dadurch werden die Programme etwas kürzer.\n"
"\nMöchten Sie den Startupcode \"stormamiga_startups.o\" installieren?\n"))

(set #ja    "ja")
(set #nein  "nein")


(set #Versions_Auswahl (cat
"\nWählen Sie die Version(en) der \"stormamiga.lib\" aus, die Sie installieren möchten.\n"
"\nDie mit \"(n/a)\" markierten Versionen sind noch nicht verfügbar.\n"))

(set #MC68EC020+                "Version für den MC68EC020+")
(set #MC68EC020+_&_MC68881+     "Version für den MC68EC020+ und MC68881+ (n/a)")
(set #MC68040+                  "Version für den MC68040+ (n/a)")


(set #Standardbeispiele_Auswahl (cat
"\nUm die Vorteile der \"stormamiga.lib\" etwas zu verdeutlichen, habe ich einige Beispiele beigelegt.\n"
"\nMöchten Sie diese Beispiele installieren.\n"))

(set #Beispiele_Liste (cat
"Installation der Beispiele.\n"
"Bitte wählen Sie ein Laufwerk oder ein Verzeichnis.\n"
"Ein Verzeichnis \"stormamiga_lib_Examples\" wird automatisch erzeugt."))

(set #Spezialbeispiele_Auswahl (cat
"\nUm die Vorteile und Anwendungsmöglichkeiten der Spezialfunktionen etwas zu verdeutlichen, habe ich einige Beispiele beigelegt.\n"
"Wenn Sie bereits die Standardbeispiele installiert haben, wird automatisch das gleiche Zielverzeichnis benutzt. Ansonsten können Sie ein Zielverzeichnis auswählen.\n"
"\nMöchten Sie diese Beispiele installieren.\n"))


(set #Spezialfunktionen_Auswahl (cat
"\nMöchten Sie die Spezialfunktionen der \"stormamiga.lib\" nutzen.\n"))


(set #User.dic_Auswahl (cat
"\nUm das Syntax Highlighting auch für die Spezialfunktionen der \"stormamiga.lib\" nutzen zu können, ist es notwendig ein Benutzerlexikon zu installieren.\n"
"\nWählen Sie aus, ob und mit welchem Name das Benutzerlexikon installiert werden soll.\n"))

(set #User1.dic         "User 1.dic")
(set #User2.dic         "User 2.dic")
(set #User3.dic         "User 3.dic")
(set #kein_User.dic     "Kein Benutzerlexikon installieren")


(set #Anleitungen_Auswahl (cat
"\nWählen Sie aus, welche Anleitung(en) Sie installieren möchten.\n"))

(set #Guide "stormamiga_lib.guide")
(set #Dok   "stormamiga_lib.dok")

;=====================================================================================
; Beginn der Installation
;=====================================================================================

(message #welcome)
(welcome)


(
    (set C_C++_beides
    (askchoice
        (prompt #Sprachstandard_Auswahl)
        (help   @askchoice-help)
        (default 2)
        (choices
        #C++
        #C
        #C_&_C++
        )
    )
    )

    (if (> C_C++_beides 0)
    (
        (set kopiere_startup
        (askchoice
            (prompt #startup_Auswahl)
            (help   @askchoice-help)
            (default 0)
            (choices
            #ja
            #nein
            )
        )
        )

        (if (= kopiere_startup 0)
        (copyfiles
            (source "stormamiga_startups.o")
            (dest "StormC:StormSYS")
        )
        )
    )
    )
)

(
    (set kopiere_Libs
    (askoptions
        (prompt #Versions_Auswahl)
        (help   @askoptions-help)
        (default 1)
        (choices
        #MC68EC020+
        #MC68EC020+_&_MC68881+
        #MC68040+
        )
    )
    )


    (if (IN kopiere_Libs 0) (set MC68EC020+  1))
    (if (IN kopiere_Libs 1) (set MC68EC020+_&_MC68881+ 1))
    (if (IN kopiere_Libs 2) (set MC68040+ 1))

    (if (= MC68EC020+ 1)
    (copyfiles
        (source "stormamiga.lib")
        (dest "StormC:Lib")
    )
    )
    (if (= MC68EC020+_&_MC68881+ 1)
    (copyfiles
        (source "stormamiga_881.lib")
        (dest "StormC:Lib")
    )
    )
    (if (= MC68040+ 1)
    (copyfiles
        (source "stormamiga_040.lib")
        (dest "StormC:Lib")
    )
    )
)

(
    (set kopiere_Standardbeispiele
    (askchoice
        (prompt #Standardbeispiele_Auswahl)
        (help   @askchoice-help)
        (default 0)
        (choices
        #ja
        #nein
        )
    )
    )
    (if (= kopiere_Standardbeispiele 0)
    (
        (set Zielverzeichnis
        (askdir
            (prompt #Beispiele_Liste)
            (help @askdir-help)
            (default "StormC:Examples")
        )
        )
        (makeassign "INST" Zielverzeichnis)
        (makedir "INST:stormamiga_lib_Examples")
        (copyfiles
        (source "Standardbeispiele")
        (dest "INST:stormamiga_lib_Examples")
        (all)
        (infos)
        )
    )
    )
)

(
    (set Spezialfunktionen_Auswahl
    (askchoice
        (prompt #Spezialfunktionen_Auswahl)
        (help   @askchoice-help)
        (default 0)
        (choices
        #ja
        #nein

        )
    )
    )

    (if (= Spezialfunktionen_Auswahl 0)
    (
        (copyfiles
        (source "stormamiga.h")
        (dest "StormC:Include")
        )
        (set kopiere_User.dic
            (askchoice
            (prompt #User.dic_Auswahl)
            (help   @askchoice-help)
            (default 0)
            (choices
                #User1.dic
                #User2.dic
                #User3.dic
                #kein_User.dic
            )
            )
        )

        (if (= kopiere_User.dic 0)
            (copyfiles
            (source "User 1.dic")
            (dest "StormC:StormSYS/Dictionary")
            )
        )
        (if (= kopiere_User.dic 1)
            (copyfiles
            (source "User 2.dic")
            (dest "StormC:StormSYS/Dictionary")
            )
        )
        (if (= kopiere_User.dic 2)
            (copyfiles
            (source "User 3.dic")
            (dest "StormC:StormSYS/Dictionary")
            )
        )
        (set kopiere_Spezialbeispiele
            (askchoice
            (prompt #Spezialbeispiele_Auswahl)
            (help   @askchoice-help)
            (default 0)
            (choices
                #ja
                #nein
            )
            )
        )
        (if (= kopiere_Spezialbeispiele 0)
            (
            (if (exists "INST:stormamiga_lib_Examples" (noreq))
                (copyfiles
                (source "Spezialbeispiele")
                (dest "INST:stormamiga_lib_Examples")
                (all)
                (infos)
                )
            )
            (if (= (exists "INST:stormamiga_lib_Examples" (noreq))0)
                (
                (set Zielverzeichnis
                    (askdir
                    (prompt #Beispiele_Liste)
                    (help @askdir-help)
                    (default "StormC:Examples")
                    )
                )
                (makeassign "INST" Zielverzeichnis)
                (makedir "INST:stormamiga_lib_Examples")
                (copyfiles
                    (source "Spezialbeispiele")
                    (dest "INST:stormamiga_lib_Examples")
                    (all)
                    (infos)
                )
                )
            )
            )
        )
    )
    )
)

(
    (set kopiere_Anleitungen
    (askoptions
        (prompt #Anleitungen_Auswahl)
        (help   @askoptions-help)
        (default 2)
        (choices
        #Dok
        #Guide
        )
    )
    )


    (if (IN kopiere_Anleitungen 0)
    (set Dok  1)
    )
    (if (IN kopiere_Anleitungen 1)
    (set Guide 1)
    )

    (if (= Dok 1)
    (
        (set Dokverzeichnis
        (askdir
            (prompt #Anleitungen_Liste)
            (help @askdir-help)
            (default "StormC:")
        )
        )
        (makeassign "INSTDOK" Dokverzeichnis)
        (copyfiles
        (source "stormamiga_lib.dok")
        (dest "INSTDOK:")
        (infos)
        )
    )
    )

    (if (= Guide 1)
    (
        (if (exists "INSTDOK:" (noreq))
        (copyfiles
            (source "stormamiga_lib.guide")
            (dest "INSTDOK:")
            (infos)
        )
        )
        (if (= (exists "INSTDOK:" (noreq))0)
        (
            (set Dokverzeichnis
            (askdir
                (prompt #Anleitungen_Liste)
                (help @askdir-help)
                (default "StormC:")
            )
            )
            (makeassign "INSTDOK" Dokverzeichnis)
            (copyfiles
            (source "stormamiga_lib.guide")
            (dest "INSTDOK:")
            (infos)
            )
        )
        )
    )
    )
)